**********************************************************************
*TABLE A4: Oligarch in ownership chain (dropping firms with no owners), 2004
**********************************************************************

use "Regressions Data/baseline0406_nown.dta",clear

local mresult "Results/TableA4.xls"
local rresult "Results/TableA4r.xls"

set more off
keep if year==2004

*No oligarch in chain
reg no_oligarch_chain  orange gray lemp tfp privatized sec1 sec2 sec4-sec10, cluster(group)
outreg2 using `mresult',  replace dec(3) ctitle(OLS oligarch) keep(orange gray lemp tfp privatized)

ivreg2 no_oligarch_chain (orange=YuDec) gray lemp tfp privatized sec1 sec2 sec4-sec10,first cluster(group)
outreg2 using `mresult',  append dec(3)  ctitle(IV oligarch) keep(orange gray lemp tfp privatized)

*Distance to oligarch
reg mdistance  orange gray lemp tfp privatized sec1 sec2 sec4-sec10, cluster(group)
outreg2 using `mresult',  append dec(3)  ctitle(OLS distance) keep(orange gray lemp tfp privatized)

ivreg2 mdistance (orange=YuDec) gray lemp tfp privatized sec1 sec2 sec4-sec10, first cluster(group)
outreg2 using `mresult',  append dec(3)  ctitle(IV distance) keep(orange gray lemp tfp privatized)

*Reduced form
reg no_oligarch_chain  YuDec gray lemp tfp privatized sec1 sec2 sec4-sec10, cluster(group)
outreg2 using `rresult',  replace dec(3) ctitle(No oligarch) keep(YuDec)

reg mdistance YuDec gray lemp tfp privatized sec1 sec2 sec4-sec10, cluster(group)
outreg2 using `rresult',  append dec(3) ctitle(Distance) keep(YuDec)

